package com.example.coffeeseller_2.utils;

import android.content.Context;
import android.content.res.Resources;
import android.graphics.Bitmap;
import android.graphics.BitmapFactory;
import android.graphics.Canvas;
import android.graphics.Rect;
import android.graphics.drawable.BitmapDrawable;
import android.graphics.drawable.Drawable;
import android.util.Log;

import com.example.coffeeseller_2.R;

import java.io.FileInputStream;
import java.io.FileNotFoundException;
import java.io.InputStream;
import java.util.ArrayList;
import java.util.List;

/**
 * Created by WH on 2018/7/26.
 * 图片处理工具
 */

public class BitmapUtil {

    /*
    * 获取指定大小的drawable
    * */
    public static Drawable getDefineDrawable(Resources resources, Drawable drawable, int width, int height) {
        if (drawable == null) {

            return null;
        }
        Bitmap desource = drawable2Bitmap(drawable);
        Bitmap target;
        target = Bitmap.createBitmap(width, height, desource.getConfig());
        Canvas temp_canvas = new Canvas(target);
        temp_canvas.drawBitmap(desource, null, new Rect(0, 0, target.getWidth(), target.getHeight()), null);
        Drawable targetDrawable = BitmapUtil.bitmap2Drawable(resources, target);
        return targetDrawable;
    }

    public static Bitmap drawable2Bitmap(Drawable drawable) {
        BitmapDrawable bd = (BitmapDrawable) drawable;
        Bitmap bm = bd.getBitmap();
        return bm;
    }

    public static Drawable bitmap2Drawable(Resources resources, Bitmap bitmap) {
        BitmapDrawable bd = new BitmapDrawable(resources, bitmap);
        return bd;
    }

    /**
     * 按长方形裁切图片
     *
     * @param bitmap
     * @return
     */

    public static Bitmap ImageCropWithRect(Bitmap bitmap, float proportionY) {

        if (bitmap == null) {
            return null;
        }
        Bitmap copyBitmap = bitmap.copy(bitmap.getConfig(), true);
        int w = copyBitmap.getWidth(); // 得到图片的宽，高
        int h = (int) (copyBitmap.getHeight() * proportionY);
        int x = 0;
        int y = copyBitmap.getHeight() - h;
        // 下面这句是关键

        if (y <= 0) {
            return null;
        }
        Bitmap bmp = Bitmap.createBitmap(copyBitmap, x, y, w, h, null, false);

        if (copyBitmap != null && !copyBitmap.equals(bmp) && !copyBitmap.isRecycled()) {

            copyBitmap.recycle();
            copyBitmap = null;
        }
        return bmp;

    }

    public static Bitmap ImageCropWithRect(Bitmap bitmap, int startY, int endY) {

        if (bitmap == null) {
            return null;
        }
        Bitmap copyBitmap = bitmap.copy(bitmap.getConfig(), true);
        int w = copyBitmap.getWidth(); // 得到图片的宽，高
        int x = 0;
        // 下面这句是关键

        if (endY <= 0 || endY - startY <= 0 || endY - startY >= copyBitmap.getHeight()) {
            return null;
        }
        Bitmap bmp = Bitmap.createBitmap(copyBitmap, x, startY, w, endY, null, false);

        if (copyBitmap != null && !copyBitmap.equals(bmp) && !copyBitmap.isRecycled()) {

            copyBitmap.recycle();
            copyBitmap = null;
        }
        return bmp;

    }

    public static Bitmap fastblur(Bitmap sentBitmap, float scale, int radius) {

        if (sentBitmap == null) {
            return null;
        }
        Bitmap bitmap = null;
        int width = Math.round(sentBitmap.getWidth() * scale);
        int height = Math.round(sentBitmap.getHeight() * scale);
        sentBitmap = Bitmap.createScaledBitmap(sentBitmap, width, height, false);

        bitmap = sentBitmap.copy(sentBitmap.getConfig(), true);

        if (radius < 1) {
            return (null);
        }

        int w = bitmap.getWidth();
        int h = bitmap.getHeight();

        int[] pix = new int[w * h];
        Log.e("pix", w + " " + h + " " + pix.length);
        bitmap.getPixels(pix, 0, w, 0, 0, w, h);

        int wm = w - 1;
        int hm = h - 1;
        int wh = w * h;

        if (wh > Integer.MAX_VALUE) {
            return null;
        }
        int div = radius + radius + 1;

        int r[] = new int[wh];
        int g[] = new int[wh];
        int b[] = new int[wh];
        int rsum, gsum, bsum, x, y, i, p, yp, yi, yw;
        int vmin[] = new int[Math.max(w, h)];

        int divsum = (div + 1) >> 1;
        divsum *= divsum;
        int dv[] = new int[256 * divsum];
        for (i = 0; i < 256 * divsum; i++) {
            dv[i] = (i / divsum);
        }

        yw = yi = 0;

        int[][] stack = new int[div][3];
        int stackpointer;
        int stackstart;
        int[] sir;
        int rbs;
        int r1 = radius + 1;
        int routsum, goutsum, boutsum;
        int rinsum, ginsum, binsum;

        for (y = 0; y < h; y++) {
            rinsum = ginsum = binsum = routsum = goutsum = boutsum = rsum = gsum = bsum = 0;
            for (i = -radius; i <= radius; i++) {
                p = pix[yi + Math.min(wm, Math.max(i, 0))];
                sir = stack[i + radius];
                sir[0] = (p & 0xff0000) >> 16;
                sir[1] = (p & 0x00ff00) >> 8;
                sir[2] = (p & 0x0000ff);
                rbs = r1 - Math.abs(i);
                rsum += sir[0] * rbs;
                gsum += sir[1] * rbs;
                bsum += sir[2] * rbs;
                if (i > 0) {
                    rinsum += sir[0];
                    ginsum += sir[1];
                    binsum += sir[2];
                } else {
                    routsum += sir[0];
                    goutsum += sir[1];
                    boutsum += sir[2];
                }
            }
            stackpointer = radius;

            for (x = 0; x < w; x++) {

                if (rsum < dv.length) {
                    r[yi] = dv[rsum];

                }
                if (gsum < dv.length) {
                    g[yi] = dv[gsum];
                }

                if (bsum < dv.length) {
                    b[yi] = dv[bsum];

                }

                rsum -= routsum;
                gsum -= goutsum;
                bsum -= boutsum;

                stackstart = stackpointer - radius + div;
                sir = stack[stackstart % div];

                routsum -= sir[0];
                goutsum -= sir[1];
                boutsum -= sir[2];

                if (y == 0) {
                    vmin[x] = Math.min(x + radius + 1, wm);
                }
                p = pix[yw + vmin[x]];

                sir[0] = (p & 0xff0000) >> 16;
                sir[1] = (p & 0x00ff00) >> 8;
                sir[2] = (p & 0x0000ff);

                rinsum += sir[0];
                ginsum += sir[1];
                binsum += sir[2];

                rsum += rinsum;
                gsum += ginsum;
                bsum += binsum;

                stackpointer = (stackpointer + 1) % div;
                sir = stack[(stackpointer) % div];

                routsum += sir[0];
                goutsum += sir[1];
                boutsum += sir[2];

                rinsum -= sir[0];
                ginsum -= sir[1];
                binsum -= sir[2];

                yi++;
            }
            yw += w;
        }
        for (x = 0; x < w; x++) {
            rinsum = ginsum = binsum = routsum = goutsum = boutsum = rsum = gsum = bsum = 0;
            yp = -radius * w;
            for (i = -radius; i <= radius; i++) {
                yi = Math.max(0, yp) + x;

                sir = stack[i + radius];

                sir[0] = r[yi];
                sir[1] = g[yi];
                sir[2] = b[yi];

                rbs = r1 - Math.abs(i);

                rsum += r[yi] * rbs;
                gsum += g[yi] * rbs;
                bsum += b[yi] * rbs;

                if (i > 0) {
                    rinsum += sir[0];
                    ginsum += sir[1];
                    binsum += sir[2];
                } else {
                    routsum += sir[0];
                    goutsum += sir[1];
                    boutsum += sir[2];
                }

                if (i < hm) {
                    yp += w;
                }
            }
            yi = x;
            stackpointer = radius;
            for (y = 0; y < h; y++) {
                // Preserve alpha channel: ( 0xff000000 & pix[yi] )
                pix[yi] = (0xff000000 & pix[yi]) | (dv[rsum] << 16) | (dv[gsum] << 8) | dv[bsum];

                rsum -= routsum;
                gsum -= goutsum;
                bsum -= boutsum;

                stackstart = stackpointer - radius + div;
                sir = stack[stackstart % div];

                routsum -= sir[0];
                goutsum -= sir[1];
                boutsum -= sir[2];

                if (x == 0) {
                    vmin[y] = Math.min(y + r1, hm) * w;
                }
                p = x + vmin[y];

                sir[0] = r[p];
                sir[1] = g[p];
                sir[2] = b[p];

                rinsum += sir[0];
                ginsum += sir[1];
                binsum += sir[2];

                rsum += rinsum;
                gsum += ginsum;
                bsum += binsum;

                stackpointer = (stackpointer + 1) % div;
                sir = stack[stackpointer];

                routsum += sir[0];
                goutsum += sir[1];
                boutsum += sir[2];

                rinsum -= sir[0];
                ginsum -= sir[1];
                binsum -= sir[2];

                yi += w;
            }
        }

        Log.e("pix", w + " " + h + " " + pix.length);
        bitmap.setPixels(pix, 0, w, 0, 0, w, h);

        sentBitmap.recycle();
        sentBitmap = null;
        return bitmap;
    }

    public static List<Bitmap> getBitmaps(Context context) {
        Bitmap bitmap = BitmapFactory.decodeResource(context.getResources(), R.mipmap.mask);
        if (bitmap == null) {
            return null;
        }
        List<Bitmap> bitmaps = new ArrayList<>();
        for (int i = 0; i < bitmap.getHeight(); i += 20) {
            if (i >= bitmap.getHeight()) {
                Bitmap b = ImageCropWithRect(bitmap, 0, bitmap.getHeight());
                bitmaps.add(b);
            } else {
                Bitmap b = ImageCropWithRect(bitmap, 0, i);
                bitmaps.add(b);
            }

        }
        return bitmaps;
    }

    /*
    * 获取压缩后的图片
    * */
    public static Bitmap getBitmap(String path) {

        InputStream is = null;
        try {
            is = new FileInputStream(path);
            //2.为位图设置100K的缓存
            BitmapFactory.Options opts = new BitmapFactory.Options();
            opts.inTempStorage = new byte[100 * 1024];
            opts.inPreferredConfig = Bitmap.Config.RGB_565;
            //4.设置图片可以被回收，创建Bitmap用于存储Pixel的内存空间在系统内存不足时可以被回收
            opts.inPurgeable = true;
            //width，hight设为原来的四分一
            opts.inSampleSize = 4;
            //6.设置解码位图的尺寸信息
            opts.inInputShareable = true;
            Bitmap btp = BitmapFactory.decodeStream(is, null, opts);
            return btp;
        } catch (FileNotFoundException e) {
            e.printStackTrace();
        }
        return null;
    }

}
